home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / RTANKEXE.ZIP / Z.TXT < prev    next >
Encoding:
Text File  |  1989-02-15  |  140 b   |  18 lines
  1. make a
  2.  
  3. auto 1
  4. lock 1
  5.  
  6. :again
  7. left
  8. rand  a,10
  9.  
  10. :loop
  11. add  a,-1
  12. jgt  a,5,:nofire
  13. fire
  14. :nofire
  15. jgt  a,0,:loop
  16.  
  17. goto :again
  18.